home *** CD-ROM | disk | FTP | other *** search
/ System Booster / System Booster.iso / SYS / s / JumpScreen.rexx < prev    next >
OS/2 REXX Batch file  |  1996-09-26  |  449b  |  25 lines
  1. /*
  2.  *
  3.  * Script name:  JumpScreen.rexx
  4.  * Author:       Franz Hemmer
  5.  * Purpose:      Demonstrate how to get Watcher title bar text.
  6.  * Written:      25.11.92
  7.  * Comments:     You need to have Watcher running.
  8.  *
  9.  */
  10.  
  11. Options FailAt 100
  12. Options Results
  13. address WATCHER1                /* Address Watcher's ARexx port. */
  14. lf = '0A'x
  15.  
  16. /*
  17.  * Try to read the window title bar
  18.  */
  19. JumpScreen
  20.  
  21. IF rc > 0 THEN
  22.   SAY 'Error was 'WATCHER.LASTERROR
  23. ELSE
  24.   SAY 'Jump ok!'
  25.